<?php
session_start();
$empresa=$_SESSION['caweb']['empresa'];

function con_caweb()
{
        if (!($link=mysql_connect("localhost","caweb","caweb")))
        {
                echo "Error conectando al sistema de bases de datos";
                exit();
        }
        if (!mysql_select_db($_SESSION['caweb']['basededatos'],$link))
        {
                echo "Error seleccionando la base de datos";
                exit();
        }
        return $link;
}


function con_mantis()
{
        if (!($link=mysql_connect("localhost","caweb","caweb")))
        {
                echo "Error conectando al sistema de bases de datos";
                exit();
        }
        if (!mysql_select_db($_SESSION['caweb']['soporte'],$link))
        {
                echo "Error seleccionando la base de datos";
                exit();
        }
        return $link;
}

$transaccion=$_GET['transaccion'];


$cpu=0;
$por=0;
$mon=0;
$imp=0;
$otr=0;
$adi=0;
$adisn=0;
$contador=1;

$link_caweb = con_caweb();
$result = "SELECT * FROM cabeceras_baj WHERE transaccion = '$transaccion'";
$result=mysql_query($result,$link_caweb) or die('Error cabeceras_baj, '.mysql_error());
$row = mysql_fetch_array($result);

$clasebaja=$row[clase];

$link_mantis = con_caweb();
$result2 ="SELECT * FROM clientes  WHERE nit='$row[cliente]'";
$result2=mysql_query($result2,$link_mantis) or die('Error clientes, '.mysql_error());
$row2 = mysql_fetch_array($result2);

require("fpdf.php");
$pdf=new FPDF('P','mm','letter');
$pdf->AliasNbPages();
$pdf->AddPage();

$pdf->SetFont('times','B',12);
$pdf->SetXY(85,15);
$pdf->Write(5,"ACTA DE BAJA No. ".$row[baja]);
$pdf->SetXY(90,20);
$pdf->Write(5,"Pedido: ".$row[pedido]);

$pdf->SetFont('times','',10);
$pdf->SetXY(10,25);
//$pdf->Write(5,'Bogota, '.date('F j \d\e Y, g:i a',strtotime($row[fecha])));
$pdf->Write(5,'Bogota, '.date('F j \d\e Y, g:i a'));
$pdf->SetXY(10,35);
$pdf->Write(5,"Implicado: ".$row2[name]);
$pdf->SetXY(10,40);
$pdf->Write(5,"Nit. ".$row[cliente]);
$pdf->SetXY(10,45);
$pdf->Write(5,"Tipo. ".$row[tipo]);

$pdf->SetXY(10,55);
$pdf->SetFont('times','B',9);
$pdf->Write(5,"RESUMEN: ");
$pdf->SetFont('times','',9);
$pdf->SetXY(10,60);
$pdf->Write(5,$row[observacion]);

$pdf->SetXY(75,80);
$pdf->Write(5,"RESUMEN  DE  ESTA  BAJA");

if ($clasebaja=='Equipos')
{
    $pdf->SetFont('times','',8);
    $pdf->SetXY(10,85);
    $pdf->Cell(10);

    $link_caweb = con_caweb();
    $result42 ="SELECT interno,item FROM detalles_baj WHERE transaccion='$transaccion'  AND LEFT(item,1)='C'
    			AND (item LIKE '%NB%' OR item LIKE '%NE%') AND interno<>'' ";
    $result42=mysql_query($result42,$link_caweb) or die('Error detalles_baj, '.mysql_error());
    $pdf->Cell(25,5,'Portatiles: '.mysql_num_rows($result42),1,0,'L');
    
    $result42 ="SELECT interno,item FROM detalles_baj WHERE transaccion='$transaccion'  AND LEFT(item,1)='C'
    			AND NOT (item LIKE '%NB%' OR item LIKE '%NE%') AND interno<>'' ";
    $result42=mysql_query($result42,$link_caweb) or die('Error detalles_baj, '.mysql_error());
    $pdf->Cell(25,5,'Cpu: '.mysql_num_rows($result42),1,0,'L');
    
    $result42 ="SELECT interno,item FROM detalles_baj WHERE transaccion='$transaccion'  AND LEFT(item,1)='I' AND interno<>'' ";
    $result42=mysql_query($result42,$link_caweb) or die('Error detalles_baj, '.mysql_error());
    $pdf->Cell(25,5,'Impresoras: '.mysql_num_rows($result42),1,0,'L');
    
    $result42 ="SELECT interno,item FROM detalles_baj WHERE transaccion='$transaccion'  AND LEFT(item,1)='M' AND interno<>'' ";
    $result42=mysql_query($result42,$link_caweb) or die('Error detalles_baj, '.mysql_error());
    $pdf->Cell(25,5,'Monitores: '.mysql_num_rows($result42),1,0,'L');
    
    $result42 ="SELECT interno,item FROM detalles_baj WHERE transaccion='$transaccion'  AND LEFT(item,1)='O' AND interno<>'' ";
    $result42=mysql_query($result42,$link_caweb) or die('Error detalles_baj, '.mysql_error());
    $pdf->Cell(25,5,'Otros Equipos: '.mysql_num_rows($result42),1,0,'L');
    
    $result42 ="SELECT interno,item FROM detalles_baj WHERE transaccion='$transaccion'  AND LEFT(item,1)='A' AND interno<>'' ";
    $result42=mysql_query($result42,$link_caweb) or die('Error detalles_baj, '.mysql_error());
    $pdf->Cell(25,5,'Aditamentos: '.mysql_num_rows($result42),1,0,'L');
    
    $result42="SELECT SUM(cantidad) AS cantidad FROM detalles_baj WHERE transaccion='$transaccion'  AND LEFT(item,1)='A' AND interno<>'' ";
    $result42=mysql_query($result42,$link_caweb) or die('Error detalles_baj, '.mysql_error());
    $row42 = mysql_fetch_array($result42);
    $pdf->Cell(25,5,'Aditam.X.Cant: '.$row42[cantidad],1,0,'L');
    
    $pdf->SetXY(20,95);
    $pdf->Write(5,"DETALLE DE EQUIPOS");
    $pdf->Line(20, 100, 185, 100);
}

if ($clasebaja=='Partes')
{
    $pdf->SetFont('times','',8);
    $pdf->SetXY(10,85);
    $pdf->Cell(30);

    $link_caweb = con_caweb();
    $result ="SELECT item,sum(cantidad) AS cantidad FROM detalles_baj WHERE transaccion='$transaccion' AND interno<>'' GROUP BY LEFT(item,3) LIMIT 0,5";
    $result=mysql_query($result,$link_caweb) or die('Error detalles_baj, '.mysql_error());
    while($row = mysql_fetch_array($result))
    {
        $pdf->Cell(25,5,$row[item].': '.$row[cantidad],1,0,'L');        
    }
    $pdf->Cell(1,5,'',0,1,'L');
      
    $result ="SELECT item,sum(cantidad) AS cantidad FROM detalles_baj WHERE transaccion='$transaccion' AND interno<>'' GROUP BY LEFT(item,3) LIMIT 5,5";
    $result=mysql_query($result,$link_caweb) or die('Error detalles_baj, '.mysql_error());
    $pdf->SetXY(10,90);
    $pdf->Cell(30);
    while($row = mysql_fetch_array($result))
    {
        $pdf->Cell(25,5,$row[item].': '.$row[cantidad],1,0,'L');        
    }
    $pdf->Cell(1,5,'',0,1,'L');
      
    $result ="SELECT item,sum(cantidad) AS cantidad FROM detalles_baj WHERE transaccion='$transaccion' AND interno<>'' GROUP BY LEFT(item,3) LIMIT 10,5";
    $result=mysql_query($result,$link_caweb) or die('Error detalles_baj, '.mysql_error());
    $pdf->SetXY(10,95);
    $pdf->Cell(30);
    while($row = mysql_fetch_array($result))
    {
        $pdf->Cell(25,5,$row[item].': '.$row[cantidad],1,0,'L');        
    }

    $pdf->SetXY(20,100);
    $pdf->Write(5,"DETALLE DE LAS PARTES");
    $pdf->Line(20, 105, 185, 105);    
}
    
$fila=105;

if ($clasebaja=='Equipos')
{
    $link_caweb = con_caweb();
    $result45 ="
    SELECT a.interno,a.item,a.serial,b.descripcion
    FROM detalles_baj AS a
    LEFT JOIN items AS b 
    ON b.codigoitem=a.item 
    WHERE a.transaccion= '$transaccion' AND a.interno <> '' 
    ORDER BY LEFT(a.item,4) DESC";
    $result45=mysql_query($result45,$link_caweb) or die('Error detalles_baj6, '.mysql_error());
    while ($row45 = mysql_fetch_array($result45))
    {
    	if(substr($row45[item],0,1)=='C' AND !(eregi('NB',$row45[item]) OR eregi('NE',$row45[item])) AND $cpu==0)
    	{
    			$cpu=1;
    			$contador=1;
    			$pdf->SetFont('times','B',11);
    			$fila=$fila+5;
    			$pdf->SetXY(20,$fila);
    			$pdf->Write(5,"CPU");
    			$pdf->SetFont('times','',9);
    			$fila=$fila+7;
    			$pdf->SetXY(20,$fila);				
    	}
    
    	if(substr($row45[item],0,1)=='C' AND (eregi('NB',$row45[item]) OR eregi('NE',$row45[item])) AND $por==0)
    	{
    			$por=1;
    			$contador=1;
    			$pdf->SetFont('times','B',11);
    			$fila=$fila+5;
    			$pdf->SetXY(20,$fila);
    			$pdf->Write(5,"PORTATILES");
    			$pdf->SetFont('times','',9);
    			$fila=$fila+7;
    			$pdf->SetXY(20,$fila);				
    	}	
    
    	if(substr($row45[item],0,1)=='M' AND $mon==0)
    	{
    			$mon=1;
    			$contador=1;
    			$pdf->SetFont('times','B',11);
    			$fila=$fila+5;
    			$pdf->SetXY(20,$fila);
    			$pdf->Write(5,"MONITORES");
    			$pdf->SetFont('times','',9);
    			$fila=$fila+7;
    			$pdf->SetXY(20,$fila);				
    	}
    
    	if(substr($row45[item],0,1)=='I' AND $imp==0)
    	{
    			$imp=1;
    			$contador=1;
    			$pdf->SetFont('times','B',11);
    			$fila=$fila+5;
    			$pdf->SetXY(20,$fila);
    			$pdf->Write(5,"IMPRESORAS");
    			$pdf->SetFont('times','',9);
    			$fila=$fila+7;
    			$pdf->SetXY(20,$fila);				
    	}
    
    	if(substr($row45[item],0,1)=='O' AND $otr==0)
    	{
    			$otr=1;
    			$contador=1;
    			$pdf->SetFont('times','B',11);
    			$fila=$fila+5;
    			$pdf->SetXY(20,$fila);
    			$pdf->Write(5,"OTROS EQUIPOS");
    			$pdf->SetFont('times','',9);
    			$fila=$fila+7;
    			$pdf->SetXY(20,$fila);				
    	}
    
        if(substr($row45[item],0,1)=='A' AND $adisn==0)
    	{
    			$adisn=1;
    			$contador=1;
    			$pdf->SetFont('times','B',11);
    			$fila=$fila+5;
    			$pdf->SetXY(20,$fila);
    			$pdf->Write(5,"ADITAMENTOS CON INTERNO Y/O SERIAL");
    			$pdf->SetFont('times','',9);
    			$fila=$fila+7;
    			$pdf->SetXY(20,$fila);				
    	}
    
    
    	$pdf->Write(5,$contador.') '.$row45[descripcion]);
    	$contador=$contador+1;
    	$fila=$fila+4;
    	$pdf->SetXY(20,$fila);
    	$pdf->Write(5,"          No. ".$row45[interno]."        S/N ".$row45[serial]);
    
    	if (substr($row45[item],0,1)=='C')
    	{
    	    $descripcionlineal='';
            $result3 ="SELECT interno,item FROM seriales_partes  WHERE bodega='BAJ' AND ubicacion='$row45[interno]'";
            $result3=mysql_query($result3,$link_caweb) or die('Error seriales_partes, '.mysql_error());
            while($row3 = mysql_fetch_array($result3))
            {
                $descripcionlineal.=$row3[item]."(".$row3[interno]."), ";
            }
           	$fila=$fila+5;
            $pdf->SetXY(28,$fila);
            $pdf->SetFont('times','',7);
            $pdf->MultiCell(155,2,$descripcionlineal);
            $pdf->SetFont('times','',9);
    	}
    
    	$fila=$fila+5;
    	$pdf->SetXY(20,$fila);
    	if ($pdf->GetY() > 240)
    	{
    		$pdf->AddPage();
    		$pdf->SetXY(20,35);
    		$pdf->Write(5,"DETALLE DE EQUIPOS");
    		$pdf->Line(20, 40, 185, 40);
    		$fila=45;
    		$pdf->SetXY(20,$fila);
    	}
    }
}
if ($clasebaja=='Partes')
{
    $link_caweb = con_caweb();   
    $result = mysql_query("SELECT item,LEFT(item,3) AS itemreferencia FROM detalles_baj WHERE transaccion='$transaccion' AND interno<>'' GROUP BY LEFT(item,3)");
    while ($row = mysql_fetch_array($result))
    {
        $contador=1;
		$pdf->SetFont('times','B',11);
		$fila=$fila+5;
		$pdf->SetXY(20,$fila);
		$pdf->Write(5,$row[item]);
		$pdf->SetFont('times','',7);
		$fila=$fila+7;
		$columna=10;
        $result2 = mysql_query("SELECT * FROM detalles_baj WHERE transaccion='$transaccion' AND LEFT(item,3) = '$row[itemreferencia]'");
        while ($row2 = mysql_fetch_array($result2))
        {
            $pdf->SetXY($columna,$fila);
            $pdf->Write(5,$contador.') Interno: '.$row2[interno].'  Serial: '.$row2[serial]);
        	$contador=$contador+1;
            $columna=$columna+90;
            
        	if ($columna > 100) { $fila=$fila+4; $columna=10; }
            if ($pdf->GetY() > 240)
        	{
        		$pdf->AddPage();
        		$pdf->SetXY(20,35);
        		$pdf->Write(5,"DETALLE DE EQUIPOS");
        		$pdf->Line(20, 40, 185, 40);
        		$fila=45;
        		$pdf->SetXY(20,$fila);
                $columna=10;
    	   }
        }
    }
}

$link_caweb = con_caweb();
$result42 ="SELECT * FROM detalles_baj WHERE transaccion = '$transaccion' AND interno =''";
$result42=mysql_query($result42,$link_caweb) or die('Error detalles_baj, '.mysql_error());
while ($row42 = mysql_fetch_array($result42))
{
        $result45="SELECT descripcionsub FROM taxonomia WHERE codigosubclase = '$row42[item]'";
        $result45=mysql_query($result45,$link_caweb) or die('Error taxonomia, '.mysql_error());
        $row45 = mysql_fetch_array($result45);
        
        if(substr($row42[item],0,1)=='A' AND $adi==0)
		{
			$adi=1;
			$contador=1;
			$pdf->SetFont('times','B',11);
			$fila=$fila+5;
			$pdf->SetXY(20,$fila);
			$pdf->Write(5,"Elementos por Cantidad");
			$pdf->SetFont('times','',9);
			$fila=$fila+7;
			$pdf->SetXY(20,$fila);				
		}
       
		$pdf->Write(5,$row45[descripcionsub]);
		$pdf->SetXY(80,$fila);
		$pdf->Write(5,"CANTIDAD: ".$row42[cantidad]);
        $fila=$fila+5;
        $pdf->SetXY(20,$fila);
        if ($pdf->GetY() > 240)
		{
			$pdf->AddPage();
			$pdf->SetXY(20,35);
			$pdf->Write(5,"DETALLE DE EQUIPOS");
			$pdf->Line(20, 40, 185, 40);
			$fila=45;
			$pdf->SetXY(20,$fila);
		}
}

$fila=15+$pdf->GetY();
if ($pdf->GetY() > 200)
{
	$pdf->AddPage();
	$fila=45;
	$pdf->SetXY(20,$fila);
}

$fila=$fila+5;
$pdf->SetXY(20,$fila);
$pdf->Write(5,"Se firma de conformidad por los que en ella intervinieron.");
$fila=$fila+20;

if ($empresa=='pccom')
{
    $pdf->SetXY(20,$fila);
    $pdf->Write(5,"ERNESTO ROJAS GIRALDO");
    $pdf->SetXY(140,$fila);
    $pdf->Write(5,"MARTHA PENAGOS MONTOYA");
    
    $fila=$fila+4;
    $pdf->SetXY(20,$fila);
    $pdf->Write(5,"Gerente PC COM S.A.");
    $pdf->SetXY(140,$fila);
    $pdf->Write(5,"Subgerente PC COM S.A.");
    
    $fila=$fila+15;
    $pdf->SetXY(20,$fila);
    $pdf->Write(5,"M. ROCIO ROJAS B.");
    $fila=$fila+4;
    $pdf->SetXY(20,$fila);
    $pdf->Write(5,"Jefe Inventarios y Facturación");
}
if ($empresa=='itoutsourcing')
{
    $pdf->SetXY(20,$fila);
    $pdf->Write(5,"MARIA VICTORIA RODRIGUEZ");
    $pdf->SetXY(140,$fila);
    $pdf->Write(5,"MARTA CONSUELO RODRIGUEZ");
    
    $fila=$fila+4;
    $pdf->SetXY(20,$fila);
    $pdf->Write(5,"Gerente ITOUTSOURCING");
    $pdf->SetXY(140,$fila);
    $pdf->Write(5,"Gerente Administrativa y Financiera");
}

if ($empresa=='ays')
{
    $pdf->SetXY(20,$fila);
    $pdf->Write(5,"MARIA VICTORIA ROJAS");
    $pdf->SetXY(140,$fila);
    $pdf->Write(5,"PEDRO ANDRES VARGAS");
    
    $fila=$fila+4;
    $pdf->SetXY(20,$fila);
    $pdf->Write(5,"Gerente");
    $pdf->SetXY(140,$fila);
    $pdf->Write(5,"Subgerente");
}


$pdf->Output();

?>